home *** CD-ROM | disk | FTP | other *** search
/ Utilities Professional 1-1500 / Utilities Professional 1-1500 (1994)(WPD)[!].iso / 12511500 / var1481.dms / var1481.adf / Scripts / marbdemo.mc < prev    next >
Text File  |  1994-07-07  |  6KB  |  379 lines

  1. /*
  2.     This file demonstrates the use of "scale" and "power" on the "marble"
  3.     pattern. "scale" increases across the X axis of the image, and "power"
  4.     increases across the Y axis of the image.
  5.  
  6.      -------------> increasing scale ----------->
  7.     |
  8.     |    O    O    O    O    O
  9.     |
  10.     \/    O    O    O    O    O
  11.     increasing
  12.       power    O    O    O    O    O    <-- 25 spheres
  13.     |
  14.     |    O    O    O    O    O
  15.     |
  16.     \/    O    O    O    O    O
  17. */
  18.  
  19. maxobcube 3
  20. maxoctdepth 5
  21.  
  22. color black {
  23.     diff    <0, 0, 0>
  24.     amb    <1, 1, 1>
  25. }
  26.  
  27. color white {
  28.     diff    <1, 1, 1>
  29.     amb    <1, 1, 1>
  30. }
  31.  
  32. real scale0 = .5
  33. real scale1 = 1
  34. real scale2 = 2
  35. real scale3 = 3
  36. real scale4 = 4
  37.  
  38. real power0 = .25
  39. real power1 = .5
  40. real power2 = 1
  41. real power3 = 2
  42. real power4 = 4
  43.  
  44. real sphere_radius = 2
  45. real sphere_spacing = sphere_radius*2.5
  46.  
  47. camera {
  48.     loc    <sphere_spacing*20, 0, 0>
  49.     target    <0, 0, 0>
  50.     hfov    2*atan((sphere_spacing*5+sphere_radius*2)/2/(sphere_spacing*20))
  51. }
  52.  
  53. marble pattern00 {
  54.     pattern    white
  55.     grain    black
  56.     scale    scale0
  57.     power    power0
  58. }
  59.     
  60. marble pattern01 {
  61.     pattern    white
  62.     grain    black
  63.     scale    scale0
  64.     power    power1
  65. }
  66.     
  67. marble pattern02 {
  68.     pattern    white
  69.     grain    black
  70.     scale    scale0
  71.     power    power2
  72. }
  73.     
  74. marble pattern03 {
  75.     pattern    white
  76.     grain    black
  77.     scale    scale0
  78.     power    power3
  79. }
  80.     
  81. marble pattern04 {
  82.     pattern    white
  83.     grain    black
  84.     scale    scale0
  85.     power    power4
  86. }
  87.  
  88. marble pattern10 {
  89.     pattern    white
  90.     grain    black
  91.     scale    scale1
  92.     power    power0
  93. }
  94.     
  95. marble pattern11 {
  96.     pattern    white
  97.     grain    black
  98.     scale    scale1
  99.     power    power1
  100. }
  101.     
  102. marble pattern12 {
  103.     pattern    white
  104.     grain    black
  105.     scale    scale1
  106.     power    power2
  107. }
  108.     
  109. marble pattern13 {
  110.     pattern    white
  111.     grain    black
  112.     scale    scale1
  113.     power    power3
  114. }
  115.     
  116. marble pattern14 {
  117.     pattern    white
  118.     grain    black
  119.     scale    scale1
  120.     power    power4
  121. }
  122.  
  123. marble pattern20 {
  124.     pattern    white
  125.     grain    black
  126.     scale    scale2
  127.     power    power0
  128. }
  129.     
  130. marble pattern21 {
  131.     pattern    white
  132.     grain    black
  133.     scale    scale2
  134.     power    power1
  135. }
  136.     
  137. marble pattern22 {
  138.     pattern    white
  139.     grain    black
  140.     scale    scale2
  141.     power    power2
  142. }
  143.     
  144. marble pattern23 {
  145.     pattern    white
  146.     grain    black
  147.     scale    scale2
  148.     power    power3
  149. }
  150.     
  151. marble pattern24 {
  152.     pattern    white
  153.     grain    black
  154.     scale    scale2
  155.     power    power4
  156. }
  157.  
  158. marble pattern30 {
  159.     pattern    white
  160.     grain    black
  161.     scale    scale3
  162.     power    power0
  163. }
  164.     
  165. marble pattern31 {
  166.     pattern    white
  167.     grain    black
  168.     scale    scale3
  169.     power    power1
  170. }
  171.     
  172. marble pattern32 {
  173.     pattern    white
  174.     grain    black
  175.     scale    scale3
  176.     power    power2
  177. }
  178.     
  179. marble pattern33 {
  180.     pattern    white
  181.     grain    black
  182.     scale    scale3
  183.     power    power3
  184. }
  185.     
  186. marble pattern34 {
  187.     pattern    white
  188.     grain    black
  189.     scale    scale3
  190.     power    power4
  191. }
  192.  
  193. marble pattern40 {
  194.     pattern    white
  195.     grain    black
  196.     scale    scale4
  197.     power    power0
  198. }
  199.     
  200. marble pattern41 {
  201.     pattern    white
  202.     grain    black
  203.     scale    scale4
  204.     power    power1
  205. }
  206.     
  207. marble pattern42 {
  208.     pattern    white
  209.     grain    black
  210.     scale    scale4
  211.     power    power2
  212. }
  213.     
  214. marble pattern43 {
  215.     pattern    white
  216.     grain    black
  217.     scale    scale4
  218.     power    power3
  219. }
  220.     
  221. marble pattern44 {
  222.     pattern    white
  223.     grain    black
  224.     scale    scale4
  225.     power    power4
  226. }
  227.  
  228.  
  229. sphere {
  230.     loc    <0, -(0-2)*sphere_spacing, -(0-2)*sphere_spacing>
  231.     radius    sphere_radius
  232.     pattern    pattern00
  233. }
  234.  
  235. sphere {
  236.     loc    <0, -(0-2)*sphere_spacing, -(1-2)*sphere_spacing>
  237.     radius    sphere_radius
  238.     pattern    pattern10
  239. }
  240.  
  241. sphere {
  242.     loc    <0, -(0-2)*sphere_spacing, -(2-2)*sphere_spacing>
  243.     radius    sphere_radius
  244.     pattern    pattern20
  245. }
  246.  
  247. sphere {
  248.     loc    <0, -(0-2)*sphere_spacing, -(3-2)*sphere_spacing>
  249.     radius    sphere_radius
  250.     pattern    pattern30
  251. }
  252.  
  253. sphere {
  254.     loc    <0, -(0-2)*sphere_spacing, -(4-2)*sphere_spacing>
  255.     radius    sphere_radius
  256.     pattern    pattern40
  257. }
  258.  
  259. sphere {
  260.     loc    <0, -(1-2)*sphere_spacing, -(0-2)*sphere_spacing>
  261.     radius    sphere_radius
  262.     pattern    pattern01
  263. }
  264.  
  265. sphere {
  266.     loc    <0, -(1-2)*sphere_spacing, -(1-2)*sphere_spacing>
  267.     radius    sphere_radius
  268.     pattern    pattern11
  269. }
  270.  
  271. sphere {
  272.     loc    <0, -(1-2)*sphere_spacing, -(2-2)*sphere_spacing>
  273.     radius    sphere_radius
  274.     pattern    pattern21
  275. }
  276.  
  277. sphere {
  278.     loc    <0, -(1-2)*sphere_spacing, -(3-2)*sphere_spacing>
  279.     radius    sphere_radius
  280.     pattern    pattern31
  281. }
  282.  
  283. sphere {
  284.     loc    <0, -(1-2)*sphere_spacing, -(4-2)*sphere_spacing>
  285.     radius    sphere_radius
  286.     pattern    pattern41
  287. }
  288.  
  289. sphere {
  290.     loc    <0, -(2-2)*sphere_spacing, -(0-2)*sphere_spacing>
  291.     radius    sphere_radius
  292.     pattern    pattern02
  293. }
  294.  
  295. sphere {
  296.     loc    <0, -(2-2)*sphere_spacing, -(1-2)*sphere_spacing>
  297.     radius    sphere_radius
  298.     pattern    pattern12
  299. }
  300.  
  301. sphere {
  302.     loc    <0, -(2-2)*sphere_spacing, -(2-2)*sphere_spacing>
  303.     radius    sphere_radius
  304.     pattern    pattern22
  305. }
  306.  
  307. sphere {
  308.     loc    <0, -(2-2)*sphere_spacing, -(3-2)*sphere_spacing>
  309.     radius    sphere_radius
  310.     pattern    pattern32
  311. }
  312.  
  313. sphere {
  314.     loc    <0, -(2-2)*sphere_spacing, -(4-2)*sphere_spacing>
  315.     radius    sphere_radius
  316.     pattern    pattern42
  317. }
  318.  
  319. sphere {
  320.     loc    <0, -(3-2)*sphere_spacing, -(0-2)*sphere_spacing>
  321.     radius    sphere_radius
  322.     pattern    pattern03
  323. }
  324.  
  325. sphere {
  326.     loc    <0, -(3-2)*sphere_spacing, -(1-2)*sphere_spacing>
  327.     radius    sphere_radius
  328.     pattern    pattern13
  329. }
  330.  
  331. sphere {
  332.     loc    <0, -(3-2)*sphere_spacing, -(2-2)*sphere_spacing>
  333.     radius    sphere_radius
  334.     pattern    pattern23
  335. }
  336.  
  337. sphere {
  338.     loc    <0, -(3-2)*sphere_spacing, -(3-2)*sphere_spacing>
  339.     radius    sphere_radius
  340.     pattern    pattern33
  341. }
  342.  
  343. sphere {
  344.     loc    <0, -(3-2)*sphere_spacing, -(4-2)*sphere_spacing>
  345.     radius    sphere_radius
  346.     pattern    pattern43
  347. }
  348.  
  349. sphere {
  350.     loc    <0, -(4-2)*sphere_spacing, -(0-2)*sphere_spacing>
  351.     radius    sphere_radius
  352.     pattern    pattern04
  353. }
  354.  
  355. sphere {
  356.     loc    <0, -(4-2)*sphere_spacing, -(1-2)*sphere_spacing>
  357.     radius    sphere_radius
  358.     pattern    pattern14
  359. }
  360.  
  361. sphere {
  362.     loc    <0, -(4-2)*sphere_spacing, -(2-2)*sphere_spacing>
  363.     radius    sphere_radius
  364.     pattern    pattern24
  365. }
  366.  
  367. sphere {
  368.     loc    <0, -(4-2)*sphere_spacing, -(3-2)*sphere_spacing>
  369.     radius    sphere_radius
  370.     pattern    pattern34
  371. }
  372.  
  373. sphere {
  374.     loc    <0, -(4-2)*sphere_spacing, -(4-2)*sphere_spacing>
  375.     radius    sphere_radius
  376.     pattern    pattern44
  377. }
  378.  
  379.